8
|
How do I put a picture on the control's center top side

Dim oScrollBar as P
oScrollBar = topparent:CONTROL_ACTIVEX1.activex
oScrollBar.Picture = oScrollBar.ExecuteTemplate("loadpicture(`c:\exontrol\images\zipdisk.gif`)")
oScrollBar.PictureDisplay = 1
oScrollBar.Value = 50
oScrollBar.Template = "VisiblePart(640) = False" // oScrollBar.VisiblePart(640) = .f.
oScrollBar.BackColor = -2147483644
|
7
|
How do I put a picture on the control's right top corner

Dim oScrollBar as P
oScrollBar = topparent:CONTROL_ACTIVEX1.activex
oScrollBar.Picture = oScrollBar.ExecuteTemplate("loadpicture(`c:\exontrol\images\zipdisk.gif`)")
oScrollBar.PictureDisplay = 2
oScrollBar.Template = "VisiblePart(640) = False" // oScrollBar.VisiblePart(640) = .f.
oScrollBar.BackColor = -2147483644
oScrollBar.Value = 50
|
6
|
How do I put a picture on the control's left top corner

Dim oScrollBar as P
oScrollBar = topparent:CONTROL_ACTIVEX1.activex
oScrollBar.Picture = oScrollBar.ExecuteTemplate("loadpicture(`c:\exontrol\images\zipdisk.gif`)")
oScrollBar.PictureDisplay = 0
oScrollBar.Template = "VisiblePart(640) = False" // oScrollBar.VisiblePart(640) = .f.
oScrollBar.BackColor = -2147483644
oScrollBar.Value = 50
|
5
|
How do I put a picture on the control's background

Dim oScrollBar as P
oScrollBar = topparent:CONTROL_ACTIVEX1.activex
oScrollBar.Picture = oScrollBar.ExecuteTemplate("loadpicture(`c:\exontrol\images\zipdisk.gif`)")
oScrollBar.Template = "VisiblePart(640) = False" // oScrollBar.VisiblePart(640) = .f.
oScrollBar.BackColor = -2147483644
|
4
|
How can I change the size of control's font

Dim oScrollBar as P
oScrollBar = topparent:CONTROL_ACTIVEX1.activex
oScrollBar.Font.Size = 12
oScrollBar.ForeColor = 255
oScrollBar.Template = "Caption(256) = `<img>0</img>thumb`" // oScrollBar.Caption(256) = "<img>0</img>thumb"
|
3
|
How do I change the control's font

Dim oScrollBar as P
oScrollBar = topparent:CONTROL_ACTIVEX1.activex
oScrollBar.Font.Name = "Tahoma"
oScrollBar.ForeColor = 255
oScrollBar.Template = "Caption(256) = `<img>0</img>thumb`" // oScrollBar.Caption(256) = "<img>0</img>thumb"
|
2
|
How can I change the control's foreground color

Dim oScrollBar as P
oScrollBar = topparent:CONTROL_ACTIVEX1.activex
oScrollBar.ForeColor = 255
oScrollBar.Template = "Caption(256) = `<img>0</img>thumb`" // oScrollBar.Caption(256) = "<img>0</img>thumb"
|
1
|
How can I change the control's background color

Dim oScrollBar as P
oScrollBar = topparent:CONTROL_ACTIVEX1.activex
oScrollBar.BackColor = 65280
oScrollBar.Template = "VisiblePart(640) = False" // oScrollBar.VisiblePart(640) = .f.
|